Developer CD Series 1990 September: Essentials 4

home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1990 September: Essentials 4 / ADC Developer CD (1990-09) [Essentials 4]_iso / Developer Essentials 4.iso / d e v e l o p / develop 3 code / Surf's Up! / Interfaces / PInterfaces / CTBUtils.p < prev next >
MacBinary | 1989-11-17 | 3.9 KB | [TEXT/MPS ]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	ZX81 Sinclair BASIC `(image/sinclairBASIC)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Applause Picture `(image/applausePicture)`	ext	Unsupported
`1%`	dexvert	bsdiff patch `(other/bsdiffPatch)`	ext	Unsupported
`1%`	dexvert	imgdiff patch `(other/imgdiffPatch)`	ext	Unsupported
`1%`	dexvert	MATLAB p-code `(other/matlabPCode)`	ext	Unsupported
`1%`	dexvert	WSUS Patch Storage File `(other/wsusPatchStorageFile)`	ext	Unsupported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Fri Nov 17 00:00:00 1989, modified Fri Nov 17 00:00:00 1989, creator 'MPS ', type ASCII, 3427 bytes "CTBUtils.p" , at 0xde3 347 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[MPS ]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0a 43 54 42 55 74 69 | 6c 73 2e 70 00 00 00 00 |..CTBUti|ls.p....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 01 00 00 40 00 00 00 |.TEXTMPS| ...@...|
|00000050| 00 00 00 00 00 0d 63 00 | 00 01 5b a1 89 40 d0 a1 |......c.|..[..@..|
|00000060| 89 40 d0 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.@......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 ea cb 00 00 |........|........|
|00000080| 7b 0d 09 43 54 42 55 74 | 69 6c 73 2e 70 0d 09 50 |{..CTBUt|ils.p..P|
|00000090| 61 73 63 61 6c 20 49 6e | 74 65 72 66 61 63 65 20 |ascal In|terface |
|000000a0| 74 6f 20 74 68 65 20 43 | 6f 6d 6d 75 6e 69 63 61 |to the C|ommunica|
|000000b0| 74 69 6f 6e 73 20 54 6f | 6f 6c 62 6f 78 20 55 74 |tions To|olbox Ut|
|000000c0| 69 6c 69 74 69 65 73 0d | 09 0d 09 43 6f 70 79 72 |ilities.|...Copyr|
|000000d0| 69 67 68 74 20 a9 20 41 | 70 70 6c 65 20 43 6f 6d |ight . A|pple Com|
|000000e0| 70 75 74 65 72 2c 20 49 | 6e 63 2e 20 31 39 38 38 |puter, I|nc. 1988|
|000000f0| 2c 31 39 38 39 0d 09 41 | 6c 6c 20 72 69 67 68 74 |,1989..A|ll right|
|00000100| 73 20 72 65 73 65 72 76 | 65 64 0d 7d 0d 7b 24 49 |s reserv|ed.}.{$I|
|00000110| 46 43 20 55 4e 44 45 46 | 49 4e 45 44 20 55 73 69 |FC UNDEF|INED Usi|
|00000120| 6e 67 49 6e 63 6c 75 64 | 65 73 7d 0d 7b 24 53 45 |ngInclud|es}.{$SE|
|00000130| 54 43 20 55 73 69 6e 67 | 49 6e 63 6c 75 64 65 73 |TC Using|Includes|
|00000140| 20 3a 3d 20 30 7d 0d 7b | 24 45 4e 44 43 7d 0d 0d | := 0}.{|$ENDC}..|
|00000150| 7b 24 49 46 43 20 4e 4f | 54 20 55 73 69 6e 67 49 |{$IFC NO|T UsingI|
|00000160| 6e 63 6c 75 64 65 73 7d | 0d 20 20 20 20 55 4e 49 |ncludes}|.    UNI|
|00000170| 54 20 43 54 42 55 74 69 | 6c 73 3b 0d 20 20 20 20 |T CTBUti|ls;.    |
|00000180| 49 4e 54 45 52 46 41 43 | 45 0d 7b 24 45 4e 44 43 |INTERFAC|E.{$ENDC|
|00000190| 7d 0d 0d 7b 24 49 46 43 | 20 55 4e 44 45 46 49 4e |}..{$IFC| UNDEFIN|
|000001a0| 45 44 20 55 73 69 6e 67 | 43 54 42 55 74 69 6c 73 |ED Using|CTBUtils|
|000001b0| 7d 0d 7b 24 53 45 54 43 | 20 55 73 69 6e 67 43 54 |}.{$SETC| UsingCT|
|000001c0| 42 55 74 69 6c 73 20 3a | 3d 20 31 7d 0d 0d 7b 24 |BUtils :|= 1}..{$|
|000001d0| 49 2b 7d 0d 7b 24 53 45 | 54 43 20 43 54 42 55 74 |I+}.{$SE|TC CTBUt|
|000001e0| 69 6c 73 49 6e 63 6c 75 | 64 65 73 20 3a 3d 20 55 |ilsInclu|des := U|
|000001f0| 73 69 6e 67 49 6e 63 6c | 75 64 65 73 7d 0d 7b 24 |singIncl|udes}.{$|
|00000200| 53 45 54 43 20 55 73 69 | 6e 67 49 6e 63 6c 75 64 |SETC Usi|ngInclud|
|00000210| 65 73 20 3a 3d 20 31 7d | 0d 7b 24 49 46 43 20 55 |es := 1}|.{$IFC U|
|00000220| 4e 44 45 46 49 4e 45 44 | 20 55 73 69 6e 67 4d 65 |NDEFINED| UsingMe|
|00000230| 6d 6f 72 79 7d 0d 7b 24 | 49 20 24 24 53 68 65 6c |mory}.{$|I $$Shel|
|00000240| 6c 28 50 49 6e 74 65 72 | 66 61 63 65 73 29 4d 65 |l(PInter|faces)Me|
|00000250| 6d 6f 72 79 2e 70 7d 0d | 7b 24 45 4e 44 43 7d 0d |mory.p}.|{$ENDC}.|
|00000260| 7b 24 49 46 43 20 55 4e | 44 45 46 49 4e 45 44 20 |{$IFC UN|DEFINED |
|00000270| 55 73 69 6e 67 50 61 63 | 6b 61 67 65 73 7d 0d 7b |UsingPac|kages}.{|
|00000280| 24 49 20 24 24 53 68 65 | 6c 6c 28 50 49 6e 74 65 |$I $$She|ll(PInte|
|00000290| 72 66 61 63 65 73 29 50 | 61 63 6b 61 67 65 73 2e |rfaces)P|ackages.|
|000002a0| 70 7d 0d 7b 24 45 4e 44 | 43 7d 0d 7b 24 49 46 43 |p}.{$END|C}.{$IFC|
|000002b0| 20 55 4e 44 45 46 49 4e | 45 44 20 55 73 69 6e 67 | UNDEFIN|ED Using|
|000002c0| 41 70 70 6c 65 54 61 6c | 6b 7d 0d 7b 24 49 20 24 |AppleTal|k}.{$I $|
|000002d0| 24 53 68 65 6c 6c 28 50 | 49 6e 74 65 72 66 61 63 |$Shell(P|Interfac|
|000002e0| 65 73 29 41 70 70 6c 65 | 54 61 6c 6b 2e 70 7d 0d |es)Apple|Talk.p}.|
|000002f0| 7b 24 45 4e 44 43 7d 0d | 7b 24 53 45 54 43 20 55 |{$ENDC}.|{$SETC U|
|00000300| 73 69 6e 67 49 6e 63 6c | 75 64 65 73 20 3a 3d 20 |singIncl|udes := |
|00000310| 43 54 42 55 74 69 6c 73 | 49 6e 63 6c 75 64 65 73 |CTBUtils|Includes|
|00000320| 7d 0d 0d 43 4f 4e 53 54 | 0d 7b 20 76 65 72 73 69 |}..CONST|.{ versi|
|00000330| 6f 6e 20 6f 66 20 74 68 | 65 20 43 6f 6d 6d 20 54 |on of th|e Comm T|
|00000340| 6f 6f 6c 62 6f 78 20 55 | 74 69 6c 69 74 69 65 73 |oolbox U|tilities|
|00000350| 20 7d 0d 09 63 75 72 43 | 54 42 55 56 65 72 73 69 | }..curC|TBUVersi|
|00000360| 6f 6e 09 09 3d 20 31 3b | 0d 09 0d 7b 20 43 54 42 |on..= 1;|...{ CTB|
|00000370| 55 45 72 72 7d 0d 09 63 | 74 62 75 47 65 6e 65 72 |UErr}..c|tbuGener|
|00000380| 69 63 45 72 72 6f 72 09 | 3d 20 2d 31 3b 0d 09 63 |icError.|= -1;..c|
|00000390| 74 62 75 4e 6f 45 72 72 | 09 09 09 3d 20 30 3b 0d |tbuNoErr|...= 0;.|
|000003a0| 0d 7b 20 44 49 54 4c 4d | 65 74 68 6f 64 20 7d 0d |.{ DITLM|ethod }.|
|000003b0| 09 6f 76 65 72 6c 61 79 | 44 49 54 4c 20 09 09 3d |.overlay|DITL ..=|
|000003c0| 20 30 3b 0d 09 61 70 70 | 65 6e 64 44 49 54 4c 52 | 0;..app|endDITLR|
|000003d0| 69 67 68 74 20 09 3d 20 | 31 3b 0d 09 61 70 70 65 |ight .= |1;..appe|
|000003e0| 6e 64 44 49 54 4c 42 6f | 74 74 6f 6d 20 09 3d 20 |ndDITLBo|ttom .= |
|000003f0| 32 3b 0d 0d 7b 20 43 68 | 6f 6f 73 65 20 72 65 73 |2;..{ Ch|oose res|
|00000400| 70 6f 6e 73 65 73 20 7d | 0d 09 63 68 6f 6f 73 65 |ponses }|..choose|
|00000410| 44 69 73 61 73 74 65 72 | 09 09 3d 20 2d 32 3b 0d |Disaster|..= -2;.|
|00000420| 09 63 68 6f 6f 73 65 46 | 61 69 6c 65 64 09 09 3d |.chooseF|ailed..=|
|00000430| 20 2d 31 3b 0d 09 63 68 | 6f 6f 73 65 41 62 6f 72 | -1;..ch|ooseAbor|
|00000440| 74 65 64 09 09 3d 20 20 | 30 3b 0d 09 63 68 6f 6f |ted..=  |0;..choo|
|00000450| 73 65 4f 4b 4d 69 6e 6f | 72 09 09 3d 20 20 31 3b |seOKMino|r..=  1;|
|00000460| 0d 09 63 68 6f 6f 73 65 | 4f 4b 4d 61 6a 6f 72 09 |..choose|OKMajor.|
|00000470| 09 3d 20 20 32 3b 0d 09 | 63 68 6f 6f 73 65 43 61 |.=  2;..|chooseCa|
|00000480| 6e 63 65 6c 09 09 3d 20 | 20 33 3b 0d 0d 7b 20 4e |ncel..= | 3;..{ N|
|00000490| 75 4c 6f 6f 6b 75 70 20 | 72 65 73 70 6f 6e 73 65 |uLookup |response|
|000004a0| 73 20 7d 0d 09 6e 6c 4f | 6b 09 09 09 09 3d 09 30 |s }..nlO|k....=.0|
|000004b0| 3b 0d 09 6e 6c 43 61 6e | 63 65 6c 09 09 09 3d 09 |;..nlCan|cel...=.|
|000004c0| 31 3b 0d 09 6e 6c 45 6a | 65 63 74 09 09 09 09 3d |1;..nlEj|ect....=|
|000004d0| 09 32 3b 0d 09 0d 7b 20 | 4e 61 6d 65 20 46 69 6c |.2;...{ |Name Fil|
|000004e0| 74 65 72 50 72 6f 63 20 | 72 65 73 70 6f 6e 73 65 |terProc |response|
|000004f0| 73 20 7d 0d 09 6e 61 6d | 65 49 6e 63 6c 75 64 65 |s }..nam|eInclude|
|00000500| 09 09 09 3d 09 31 3b 0d | 09 6e 61 6d 65 44 69 73 |...=.1;.|.nameDis|
|00000510| 61 62 6c 65 09 09 09 3d | 09 32 3b 0d 09 6e 61 6d |able...=|.2;..nam|
|00000520| 65 52 65 6a 65 63 74 09 | 09 09 3d 09 33 3b 0d 09 |eReject.|..=.3;..|
|00000530| 0d 7b 20 5a 6f 6e 65 20 | 46 69 6c 74 65 72 50 72 |.{ Zone |FilterPr|
|00000540| 6f 63 20 72 65 73 70 6f | 6e 73 65 73 20 7d 0d 09 |oc respo|nses }..|
|00000550| 7a 6f 6e 65 49 6e 63 6c | 75 64 65 09 09 09 3d 09 |zoneIncl|ude...=.|
|00000560| 31 3b 0d 09 7a 6f 6e 65 | 44 69 73 61 62 6c 65 09 |1;..zone|Disable.|
|00000570| 09 09 3d 09 32 3b 0d 09 | 7a 6f 6e 65 52 65 6a 65 |..=.2;..|zoneReje|
|00000580| 63 74 09 09 09 3d 09 33 | 3b 0d 09 0d 7b 20 44 69 |ct...=.3|;...{ Di|
|00000590| 61 6c 6f 67 20 69 74 65 | 6d 73 20 66 6f 72 20 68 |alog ite|ms for h|
|000005a0| 6f 6f 6b 20 70 72 6f 63 | 65 64 75 72 65 20 7d 0d |ook proc|edure }.|
|000005b0| 09 68 6f 6f 6b 4f 4b 09 | 09 09 09 3d 09 31 3b 0d |.hookOK.|...=.1;.|
|000005c0| 09 68 6f 6f 6b 43 61 6e | 63 65 6c 20 09 09 09 3d |.hookCan|cel ...=|
|000005d0| 09 32 3b 0d 09 68 6f 6f | 6b 4f 75 74 6c 69 6e 65 |.2;..hoo|kOutline|
|000005e0| 09 09 09 3d 09 33 3b 0d | 09 68 6f 6f 6b 54 69 74 |...=.3;.|.hookTit|
|000005f0| 6c 65 09 09 09 3d 09 34 | 3b 0d 09 68 6f 6f 6b 49 |le...=.4|;..hookI|
|00000600| 74 65 6d 4c 69 73 74 09 | 09 3d 09 35 3b 0d 09 68 |temList.|.=.5;..h|
|00000610| 6f 6f 6b 5a 6f 6e 65 54 | 69 74 6c 65 09 09 3d 09 |ookZoneT|itle..=.|
|00000620| 36 3b 0d 09 68 6f 6f 6b | 5a 6f 6e 65 4c 69 73 74 |6;..hook|ZoneList|
|00000630| 09 09 3d 09 37 3b 0d 09 | 68 6f 6f 6b 4c 69 6e 65 |..=.7;..|hookLine|
|00000640| 09 09 09 3d 09 38 3b 0d | 09 68 6f 6f 6b 56 65 72 |...=.8;.|.hookVer|
|00000650| 73 69 6f 6e 09 09 09 3d | 09 39 3b 0d 09 68 6f 6f |sion...=|.9;..hoo|
|00000660| 6b 52 65 73 65 72 76 65 | 64 31 09 09 3d 09 31 30 |kReserve|d1..=.10|
|00000670| 3b 0d 09 68 6f 6f 6b 52 | 65 73 65 72 76 65 64 32 |;..hookR|eserved2|
|00000680| 20 09 09 3d 09 31 31 3b | 0d 09 68 6f 6f 6b 52 65 | ..=.11;|..hookRe|
|00000690| 73 65 72 76 65 64 33 09 | 09 3d 09 31 32 3b 0d 09 |served3.|.=.12;..|
|000006a0| 68 6f 6f 6b 52 65 73 65 | 72 76 65 64 34 09 09 3d |hookRese|rved4..=|
|000006b0| 09 31 33 3b 0d 7b 20 56 | 69 72 74 75 61 6c 20 69 |.13;.{ V|irtual i|
|000006c0| 74 65 6d 73 20 69 6e 20 | 74 68 65 20 64 69 61 6c |tems in |the dial|
|000006d0| 6f 67 20 69 74 65 6d 20 | 6c 69 73 74 20 7d 0d 09 |og item |list }..|
|000006e0| 68 6f 6f 6b 4e 75 6c 6c | 09 09 09 3d 09 31 30 30 |hookNull|...=.100|
|000006f0| 3b 0d 09 68 6f 6f 6b 49 | 74 65 6d 52 65 66 72 65 |;..hookI|temRefre|
|00000700| 73 68 09 09 3d 09 31 30 | 31 3b 0d 09 68 6f 6f 6b |sh..=.10|1;..hook|
|00000710| 5a 6f 6e 65 52 65 66 72 | 65 73 68 09 09 3d 09 31 |ZoneRefr|esh..=.1|
|00000720| 30 32 3b 0d 09 68 6f 6f | 6b 45 6a 65 63 74 09 09 |02;..hoo|kEject..|
|00000730| 09 3d 09 31 30 33 3b 0d | 09 68 6f 6f 6b 50 72 65 |.=.103;.|.hookPre|
|00000740| 66 6c 69 67 68 74 09 09 | 3d 09 31 30 34 3b 0d 09 |flight..|=.104;..|
|00000750| 68 6f 6f 6b 50 6f 73 74 | 66 6c 69 67 68 74 09 09 |hookPost|flight..|
|00000760| 3d 09 31 30 35 3b 0d 09 | 68 6f 6f 6b 4b 65 79 42 |=.105;..|hookKeyB|
|00000770| 61 73 65 09 09 09 3d 09 | 31 30 30 30 3b 0d 09 0d |ase...=.|1000;...|
|00000780| 7b 09 50 6f 70 75 70 20 | 43 6f 6e 74 72 6f 6c 20 |{.Popup |Control |
|00000790| 43 6f 6e 73 74 61 6e 74 | 73 20 7d 0d 09 70 6f 70 |Constant|s }..pop|
|000007a0| 75 70 4d 65 6e 75 43 44 | 45 46 70 72 6f 63 09 3d |upMenuCD|EFproc.=|
|000007b0| 09 31 30 30 38 3b 0d 0d | 7b 09 50 6f 70 75 70 20 |.1008;..|{.Popup |
|000007c0| 56 61 72 69 61 74 69 6f | 6e 20 43 6f 64 65 73 20 |Variatio|n Codes |
|000007d0| 7d 0d 09 70 6f 70 75 70 | 46 69 78 65 64 57 69 64 |}..popup|FixedWid|
|000007e0| 74 68 09 09 3d 09 24 30 | 30 30 31 3b 0d 09 70 6f |th..=.$0|001;..po|
|000007f0| 70 75 70 55 73 65 43 51 | 44 09 09 09 3d 09 24 30 |pupUseCQ|D...=.$0|
|00000800| 30 30 32 3b 0d 09 70 6f | 70 75 70 55 73 65 41 64 |002;..po|pupUseAd|
|00000810| 64 52 65 73 4d 65 6e 75 | 09 3d 09 24 30 30 30 34 |dResMenu|.=.$0004|
|00000820| 3b 0d 09 70 6f 70 75 70 | 55 73 65 57 46 6f 6e 74 |;..popup|UseWFont|
|00000830| 09 09 3d 09 24 30 30 30 | 38 3b 0d 0d 7b 09 50 6f |..=.$000|8;..{.Po|
|00000840| 70 75 70 20 54 69 74 6c | 65 20 63 68 61 72 61 63 |pup Titl|e charac|
|00000850| 74 65 72 69 73 74 69 63 | 73 20 7d 0d 09 70 6f 70 |teristic|s }..pop|
|00000860| 75 70 54 69 74 6c 65 42 | 6f 6c 64 09 09 3d 09 24 |upTitleB|old..=.$|
|00000870| 30 30 30 30 30 31 30 30 | 3b 0d 09 70 6f 70 75 70 |00000100|;..popup|
|00000880| 54 69 74 6c 65 49 74 61 | 6c 69 63 09 3d 09 24 30 |TitleIta|lic.=.$0|
|00000890| 30 30 30 30 32 30 30 3b | 0d 09 70 6f 70 75 70 54 |0000200;|..popupT|
|000008a0| 69 74 6c 65 55 6e 64 65 | 72 6c 69 6e 65 09 3d 09 |itleUnde|rline.=.|
|000008b0| 24 30 30 30 30 30 34 30 | 30 3b 0d 09 70 6f 70 75 |$0000040|0;..popu|
|000008c0| 70 54 69 74 6c 65 4f 75 | 74 6c 69 6e 65 09 3d 09 |pTitleOu|tline.=.|
|000008d0| 24 30 30 30 30 30 38 30 | 30 3b 0d 09 70 6f 70 75 |$0000080|0;..popu|
|000008e0| 70 54 69 74 6c 65 53 68 | 61 64 6f 77 09 3d 09 24 |pTitleSh|adow.=.$|
|000008f0| 30 30 30 30 31 30 30 30 | 3b 0d 09 70 6f 70 75 70 |00001000|;..popup|
|00000900| 54 69 74 6c 65 43 6f 6e | 64 65 6e 73 65 09 3d 09 |TitleCon|dense.=.|
|00000910| 24 30 30 30 30 32 30 30 | 30 3b 0d 09 70 6f 70 75 |$0000200|0;..popu|
|00000920| 70 54 69 74 6c 65 45 78 | 74 65 6e 64 09 3d 09 24 |pTitleEx|tend.=.$|
|00000930| 30 30 30 30 34 30 30 30 | 3b 0d 20 09 70 6f 70 75 |00004000|;. .popu|
|00000940| 70 54 69 74 6c 65 4e 6f | 53 74 79 6c 65 09 3d 09 |pTitleNo|Style.=.|
|00000950| 24 30 30 30 30 38 30 30 | 30 3b 0d 0d 09 70 6f 70 |$0000800|0;...pop|
|00000960| 75 70 54 69 74 6c 65 4c | 65 66 74 4a 75 73 74 09 |upTitleL|eftJust.|
|00000970| 3d 09 24 30 30 30 30 30 | 30 30 30 3b 0d 09 70 6f |=.$00000|000;..po|
|00000980| 70 75 70 54 69 74 6c 65 | 43 65 6e 74 65 72 4a 75 |pupTitle|CenterJu|
|00000990| 73 74 3d 09 24 30 30 30 | 30 30 30 30 31 3b 0d 09 |st=.$000|00001;..|
|000009a0| 70 6f 70 75 70 54 69 74 | 6c 65 52 69 67 68 74 4a |popupTit|leRightJ|
|000009b0| 75 73 74 09 3d 09 24 30 | 30 30 30 30 30 46 46 3b |ust.=.$0|00000FF;|
|000009c0| 0d 0d 54 59 50 45 0d 09 | 43 54 42 55 45 72 72 20 |..TYPE..|CTBUErr |
|000009d0| 09 3d 20 4f 53 45 72 72 | 3b 0d 09 44 49 54 4c 4d |.= OSErr|;..DITLM|
|000009e0| 65 74 68 6f 64 20 09 3d | 20 49 4e 54 45 47 45 52 |ethod .=| INTEGER|
|000009f0| 3b 0d 09 0d 09 4e 4c 54 | 79 70 65 45 6e 74 72 79 |;....NLT|ypeEntry|
|00000a00| 20 3d 20 52 45 43 4f 52 | 44 0d 09 09 68 49 63 6f | = RECOR|D...hIco|
|00000a10| 6e 09 09 3a 20 48 61 6e | 64 6c 65 3b 0d 09 09 74 |n..: Han|dle;...t|
|00000a20| 79 70 65 53 74 72 20 09 | 3a 20 53 74 72 33 32 3b |ypeStr .|: Str32;|
|00000a30| 0d 09 45 4e 44 3b 0d 09 | 0d 09 4e 4c 54 79 70 65 |..END;..|..NLType|
|00000a40| 20 09 09 3d 20 41 72 72 | 61 79 5b 30 2e 2e 33 5d | ..= Arr|ay[0..3]|
|00000a50| 20 6f 66 20 4e 4c 54 79 | 70 65 45 6e 74 72 79 3b | of NLTy|peEntry;|
|00000a60| 0d 09 0d 09 4c 6f 6f 6b | 75 70 52 65 70 6c 79 20 |....Look|upReply |
|00000a70| 3d 20 52 45 43 4f 52 44 | 0d 09 09 74 68 65 45 6e |= RECORD|...theEn|
|00000a80| 74 69 74 79 09 3a 09 45 | 6e 74 69 74 79 4e 61 6d |tity.:.E|ntityNam|
|00000a90| 65 3b 0d 09 09 74 68 65 | 41 64 64 72 09 09 3a 09 |e;...the|Addr..:.|
|00000aa0| 41 64 64 72 42 6c 6f 63 | 6b 3b 0d 09 45 4e 44 3b |AddrBloc|k;..END;|
|00000ab0| 0d 09 0d 0d 46 55 4e 43 | 54 49 4f 4e 09 49 6e 69 |....FUNC|TION.Ini|
|00000ac0| 74 43 54 42 55 74 69 6c | 69 74 69 65 73 3a 20 43 |tCTBUtil|ities: C|
|00000ad0| 54 42 55 45 72 72 3b 0d | 46 55 4e 43 54 49 4f 4e |TBUErr;.|FUNCTION|
|00000ae0| 09 43 54 42 47 65 74 43 | 54 42 56 65 72 73 69 6f |.CTBGetC|TBVersio|
|00000af0| 6e 20 3a 20 49 4e 54 45 | 47 45 52 3b 0d 0d 50 52 |n : INTE|GER;..PR|
|00000b00| 4f 43 45 44 55 52 45 20 | 09 41 70 70 65 6e 64 44 |OCEDURE |.AppendD|
|00000b10| 49 54 4c 28 74 68 65 44 | 69 61 6c 6f 67 3a 20 44 |ITL(theD|ialog: D|
|00000b20| 69 61 6c 6f 67 50 74 72 | 3b 20 74 68 65 44 49 54 |ialogPtr|; theDIT|
|00000b30| 4c 3a 20 48 61 6e 64 6c | 65 3b 20 6d 65 74 68 6f |L: Handl|e; metho|
|00000b40| 64 3a 20 44 49 54 4c 4d | 65 74 68 6f 64 29 3b 0d |d: DITLM|ethod);.|
|00000b50| 46 55 4e 43 54 49 4f 4e | 20 09 43 6f 75 6e 74 44 |FUNCTION| .CountD|
|00000b60| 49 54 4c 28 74 68 65 44 | 69 61 6c 6f 67 3a 20 44 |ITL(theD|ialog: D|
|00000b70| 69 61 6c 6f 67 50 74 72 | 29 20 3a 20 49 4e 54 45 |ialogPtr|) : INTE|
|00000b80| 47 45 52 3b 0d 50 52 4f | 43 45 44 55 52 45 20 09 |GER;.PRO|CEDURE .|
|00000b90| 53 68 6f 72 74 65 6e 44 | 49 54 4c 28 74 68 65 44 |ShortenD|ITL(theD|
|00000ba0| 69 61 6c 6f 67 3a 20 44 | 69 61 6c 6f 67 50 74 72 |ialog: D|ialogPtr|
|00000bb0| 3b 20 6e 75 6d 62 65 72 | 49 74 65 6d 73 3a 20 49 |; number|Items: I|
|00000bc0| 4e 54 45 47 45 52 29 3b | 0d 0d 46 55 4e 43 54 49 |NTEGER);|..FUNCTI|
|00000bd0| 4f 4e 09 4e 75 4c 6f 6f | 6b 75 70 28 77 68 65 72 |ON.NuLoo|kup(wher|
|00000be0| 65 3a 20 50 6f 69 6e 74 | 3b 20 70 72 6f 6d 70 74 |e: Point|; prompt|
|00000bf0| 3a 20 53 74 72 32 35 35 | 3b 20 6e 75 6d 54 79 70 |: Str255|; numTyp|
|00000c00| 65 73 3a 20 49 4e 54 45 | 47 45 52 3b 0d 09 09 09 |es: INTE|GER;....|
|00000c10| 09 09 20 74 79 70 65 4c | 69 73 74 3a 20 4e 4c 54 |.. typeL|ist: NLT|
|00000c20| 79 70 65 3b 20 6e 61 6d | 65 46 69 6c 74 65 72 3a |ype; nam|eFilter:|
|00000c30| 20 50 72 6f 63 50 74 72 | 3b 20 7a 6f 6e 65 46 69 | ProcPtr|; zoneFi|
|00000c40| 6c 74 65 72 3a 20 50 72 | 6f 63 50 74 72 3b 0d 09 |lter: Pr|ocPtr;..|
|00000c50| 09 09 09 09 20 68 6f 6f | 6b 50 72 6f 63 3a 20 50 |.... hoo|kProc: P|
|00000c60| 72 6f 63 50 74 72 3b 20 | 56 41 52 20 74 68 65 52 |rocPtr; |VAR theR|
|00000c70| 65 70 6c 79 3a 20 4c 6f | 6f 6b 75 70 52 65 70 6c |eply: Lo|okupRepl|
|00000c80| 79 29 20 3a 20 49 4e 54 | 45 47 45 52 3b 0d 0d 46 |y) : INT|EGER;..F|
|00000c90| 55 4e 43 54 49 4f 4e 09 | 4e 75 50 4c 6f 6f 6b 75 |UNCTION.|NuPLooku|
|00000ca0| 70 28 77 68 65 72 65 3a | 20 50 6f 69 6e 74 3b 20 |p(where:| Point; |
|00000cb0| 70 72 6f 6d 70 74 3a 20 | 53 74 72 32 35 35 3b 20 |prompt: |Str255; |
|00000cc0| 6e 75 6d 54 79 70 65 73 | 3a 20 49 4e 54 45 47 45 |numTypes|: INTEGE|
|00000cd0| 52 3b 0d 09 09 09 09 20 | 20 20 74 79 70 65 4c 69 |R;..... |  typeLi|
|00000ce0| 73 74 3a 20 4e 4c 54 79 | 70 65 3b 20 6e 61 6d 65 |st: NLTy|pe; name|
|00000cf0| 46 69 6c 74 65 72 3a 20 | 50 72 6f 63 50 74 72 3b |Filter: |ProcPtr;|
|00000d00| 20 7a 6f 6e 65 46 69 6c | 74 65 72 3a 20 50 72 6f | zoneFil|ter: Pro|
|00000d10| 63 50 74 72 3b 0d 09 09 | 09 09 20 20 20 68 6f 6f |cPtr;...|..   hoo|
|00000d20| 6b 50 72 6f 63 3a 20 50 | 72 6f 63 50 74 72 3b 20 |kProc: P|rocPtr; |
|00000d30| 75 73 65 72 44 61 74 61 | 3a 20 4c 4f 4e 47 49 4e |userData|: LONGIN|
|00000d40| 54 3b 20 64 69 61 6c 6f | 67 49 44 3a 20 49 4e 54 |T; dialo|gID: INT|
|00000d50| 45 47 45 52 3b 20 0d 09 | 09 09 09 20 20 20 66 69 |EGER; ..|...   fi|
|00000d60| 6c 74 65 72 50 72 6f 63 | 3a 20 50 72 6f 63 50 74 |lterProc|: ProcPt|
|00000d70| 72 3b 20 56 41 52 20 74 | 68 65 52 65 70 6c 79 3a |r; VAR t|heReply:|
|00000d80| 20 4c 6f 6f 6b 75 70 52 | 65 70 6c 79 29 20 3a 20 | LookupR|eply) : |
|00000d90| 49 4e 54 45 47 45 52 3b | 0d 0d 7b 24 45 4e 44 43 |INTEGER;|..{$ENDC|
|00000da0| 7d 20 20 20 20 7b 20 55 | 73 69 6e 67 43 54 42 55 |}    { U|singCTBU|
|00000db0| 74 69 6c 73 20 7d 0d 0d | 7b 24 49 46 43 20 4e 4f |tils }..|{$IFC NO|
|00000dc0| 54 20 55 73 69 6e 67 49 | 6e 63 6c 75 64 65 73 7d |T UsingI|ncludes}|
|00000dd0| 0d 20 20 20 20 45 4e 44 | 2e 0d 7b 24 45 4e 44 43 |.    END|..{$ENDC|
|00000de0| 7d 0d 0d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |}.......|........|
|00000df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e00| 00 00 01 00 00 00 01 29 | 00 00 00 29 00 00 00 32 |.......)|...)...2|
|00000e10| 65 09 09 2a 2f 0d 09 09 | 09 09 09 09 09 61 6c 69 |e..*/...|.....ali|
|00000e20| 67 6e 20 77 6f 72 64 3b | 0d 09 09 09 09 09 09 09 |gn word;|........|
|00000e30| 0a 43 54 42 55 74 69 6c | 73 2e 70 74 02 00 00 00 |.CTBUtil|s.pt....|
|00000e40| 54 45 58 54 4d 50 53 20 | 01 00 00 40 00 00 00 00 |TEXTMPS |...@....|
|00000e50| 00 00 54 45 58 54 4d 50 | 53 20 01 00 00 40 00 00 |..TEXTMP|S ...@..|
|00000e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e70| 00 00 a1 88 fa 80 00 00 | 0d 63 00 00 01 5b 20 69 |........|.c...[ i|
|00000e80| 6e 74 65 67 65 72 3b 09 | 09 09 09 09 09 09 09 2f |nteger;.|......./|
|00000e90| 2a 20 42 6f 6f 74 20 42 | 6c 6f 63 6b 20 56 65 72 |* Boot B|lock Ver|
|00000ea0| 73 69 6f 6e 09 2a 2f 0d | 09 09 09 09 75 6e 73 69 |sion.*/.|....unsi|
|00000eb0| 67 6e 65 64 20 69 6e 74 | 65 67 65 72 3b 09 09 09 |gned int|eger;...|
|00000ec0| 09 09 09 09 09 2f 2a 20 | 4e 75 6d 62 65 72 20 6f |...../* |Number o|
|00000ed0| 66 20 4f 70 65 6e 20 46 | 69 6c 65 73 09 2a 2f 0d |f Open F|iles.*/.|
|00000ee0| 09 09 09 09 75 6e 73 69 | 67 6e 65 64 20 69 6e 74 |....unsi|gned int|
|00000ef0| 65 67 65 72 3b 09 09 09 | 09 09 09 09 09 2f 2a 20 |eger;...|...../* |
|00000f00| 00 00 00 25 01 00 80 00 | 00 00 03 31 2e 30 1a 43 |...%....|...1.0.C|
|00000f10| 6f 6d 6d 75 6e 69 63 61 | 74 69 6f 6e 73 20 54 6f |ommunica|tions To|
|00000f20| 6f 6c 62 6f 78 20 31 2e | 30 00 00 01 00 00 00 01 |olbox 1.|0.......|
|00000f30| 29 00 00 00 29 00 00 00 | 32 00 1a 94 08 09 ec 00 |)...)...|2.......|
|00000f40| 00 00 1c 00 32 00 00 76 | 65 72 73 00 00 00 0a 00 |....2..v|ers.....|
|00000f50| 02 ff ff 00 00 00 00 00 | 1a 92 20 00 00 00 00 00 |........|.. .....|
|00000f60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+